prompt = {'Enter Fiber length:(Km)','Enter attenuation coefficient:(dB/km)','Enter inital power (P0):(uW)','Enter splices number','Enter splices loss:(dB)','Enter connector number','Enter connector loss:(dB)'};
dlg_title = 'Overall attenuation Calculator';
num_lines = 1;
def = {'10','2','120','9','1','0','0'};
answer = inputdlg(prompt,dlg_title,num_lines,def);
if isempty(answer)
answer= def;
end
Flength= str2num(answer{1}); 
Attenuation= str2num(answer{2});
P0= (str2num(answer{3})); 
Splices= str2num(answer{4});
SpliceLoss= str2num(answer{5}); 
L=0:Flength/200:Flength;
power= 1;
plot(L,power);
xlabel('Fiber length'); 
ylabel('Power');
